
1?chr$(11):poke12369,32:h=0:j=12408:b=13268:d$=".":t=0:e=0:bb=b+1:bc=b-1
2ifh=0thenh=j+int(rnd(1)*400):o=12289:p=12307:pokeh-80,25:ift>350thene=1
3pokeh,20:pokeh+40,194:pokeh-40,32:h=h+40:ifh=borh=bborh=bcthen10
4ifh>13247thenpokeh,32:pokeh-40,32:h=0:forp=0to78:pset(p,65):next
5foro=otop:reada$:pokeo,asc(a$):next:k$=inkey$:ifk$<>"z"andk$<>"."then7
6d$=k$:pokeh-9,46:ife=1then?"Bombs Caught: "s:?"Play Again?":inputa$:run
7ifd$="z"andb>13249thenpokeb,32:pokeb+1,32:b=b-1:pokeb,174:pokeb-1,173
8ifd$="."andb<13286thenpokeb,32:pokeb-1,32:b=b+1:pokeb,173:pokeb+1,174
9t=t+1:restore:goto2:data" ",B,O,M,B," ",C,A,T,C,H,E,R," ",2,0,2,0," "
10pokeh,216:forw=1to200:sound(20,l):next:s=s+1:pokeh-40,32:h=0:goto2
